home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / mmedia / system / ap2 / scripts / m1_____6.p2s < prev    next >
Encoding:
Text File  |  1994-05-11  |  702 b   |  29 lines
  1.  
  2. open sequencer00 alias midiplayer notify
  3. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_OPEN #1
  4. @WAIT_NOTIFY 1 30000
  5. load midiplayer ?AP2PATH?ballgame.mid notify
  6. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_LOAD
  7. #@BREAK Listen to hear volume changes
  8. masteraudio volume 60
  9. play midiplayer notify
  10. +MM_MCINOTIFY MCI_NOTIFY_ABORTED MCI_PLAY
  11. masteraudio query volume wait
  12. =60
  13. @PAUSE 10000
  14. masteraudio volume 70
  15. masteraudio query volume wait
  16. =70
  17. @PAUSE 10000
  18. masteraudio volume 80
  19. masteraudio query volume wait
  20. =80
  21. @PAUSE 10000
  22. masteraudio volume 90
  23. masteraudio query volume wait
  24. =90
  25. @PAUSE 10000
  26. close midiplayer notify
  27. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CLOSE #2
  28. @WAIT_NOTIFY 2 30000
  29.